home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 20 / Cream of the Crop 20 (Terry Blount) (1996).iso / bbs / cddk9606.zip / HEADERS.ARJ / XSTRINGS.INT < prev   
Text File  |  1996-06-14  |  23KB  |  756 lines
  1.  
  2. { ───────────────────────────────────────────────────────────────────────── }
  3. {  XSTRINGS: Extended strings unit                                          }
  4. {  Copyright 1996 David Pinch ∙ All Rights Reserved Worldwide               }
  5. { ───────────────────────────────────────────────────────────────────────── }
  6.  
  7. UNIT xStrings;
  8.  
  9. {$B-} { . . . . . . . . . . . . . . . . . . . . Shortcut boolean evaluation }
  10. {$F+} { . . . . . . . . . . . . . . . . . . . .  Force far calls for safety }
  11. {$I-} { . . . . . . . . . . . . . . . . . . . Disable input/output checking }
  12. {$O+} { . . . . . . . . . . . . . . . . . . Allow this unit to be overlayed }
  13. {$Q-} { . . . . . . . . . . . . . .  Do not generate overflow-checking code }
  14. {$R-} { . . . . . . . . . . . . . . . . Do not generate range-checking code }
  15. {$S-} { . . . . . . . . . . . . . . . . Do not generate stack-checking code }
  16. {$X+} { . . . . . . . . . . . Extended syntax for pChars and function calls }
  17.  
  18. INTERFACE
  19.  
  20. TYPE
  21.  
  22.   pChar1   = ARRAY[0 ..   1] OF Char;    pChar2   = ARRAY[0 ..   2] OF Char;
  23.   pChar3   = ARRAY[0 ..   3] OF Char;    pChar4   = ARRAY[0 ..   4] OF Char;
  24.   pChar5   = ARRAY[0 ..   5] OF Char;    pChar6   = ARRAY[0 ..   6] OF Char;
  25.   pChar7   = ARRAY[0 ..   7] OF Char;    pChar8   = ARRAY[0 ..   8] OF Char;
  26.   pChar9   = ARRAY[0 ..   9] OF Char;
  27.  
  28.   pChar10  = ARRAY[0 ..  10] OF Char;
  29.   pChar15  = ARRAY[0 ..  15] OF Char;
  30.   pChar20  = ARRAY[0 ..  20] OF Char;
  31.   pChar30  = ARRAY[0 ..  30] OF Char;
  32.   pChar40  = ARRAY[0 ..  40] OF Char;
  33.   pChar50  = ARRAY[0 ..  50] OF Char;
  34.   pChar60  = ARRAY[0 ..  60] OF Char;
  35.   pChar70  = ARRAY[0 ..  70] OF Char;
  36.   pChar80  = ARRAY[0 ..  80] OF Char;
  37.   pChar90  = ARRAY[0 ..  90] OF Char;
  38.  
  39.   pChar100 = ARRAY[0 .. 100] OF Char;
  40.   pChar200 = ARRAY[0 .. 200] OF Char;
  41.   pChar300 = ARRAY[0 .. 300] OF Char;
  42.   pChar400 = ARRAY[0 .. 400] OF Char;
  43.  
  44.   String1   = STRING[1];    String2   = STRING[2];    String3   = STRING[3];
  45.   String4   = STRING[4];    String5   = STRING[5];    String6   = STRING[6];
  46.   String7   = STRING[7];    String8   = STRING[8];    String9   = STRING[9];
  47.   String10  = STRING[10];   String11  = STRING[11];   String12  = STRING[12];
  48.   String13  = STRING[13];   String14  = STRING[14];   String15  = STRING[15];
  49.   String16  = STRING[16];   String17  = STRING[17];   String18  = STRING[18];
  50.   String19  = STRING[19];   String20  = STRING[20];   String21  = STRING[21];
  51.   String22  = STRING[22];   String23  = STRING[23];   String24  = STRING[24];
  52.   String25  = STRING[25];   String26  = STRING[26];   String27  = STRING[27];
  53.   String28  = STRING[28];   String29  = STRING[29];   String30  = STRING[30];
  54.   String31  = STRING[31];   String32  = STRING[32];   String33  = STRING[33];
  55.   String34  = STRING[34];   String35  = STRING[35];   String36  = STRING[36];
  56.   String37  = STRING[37];   String38  = STRING[38];   String39  = STRING[39];
  57.   String40  = STRING[40];   String41  = STRING[41];   String42  = STRING[42];
  58.   String43  = STRING[43];   String44  = STRING[44];   String45  = STRING[45];
  59.   String46  = STRING[46];   String47  = STRING[47];   String48  = STRING[48];
  60.   String49  = STRING[49];   String50  = STRING[50];   String51  = STRING[51];
  61.   String52  = STRING[52];   String53  = STRING[53];   String54  = STRING[54];
  62.   String55  = STRING[55];   String56  = STRING[56];   String57  = STRING[57];
  63.   String58  = STRING[58];   String59  = STRING[59];   String60  = STRING[60];
  64.   String61  = STRING[61];   String62  = STRING[62];   String63  = STRING[63];
  65.   String64  = STRING[64];   String65  = STRING[65];   String66  = STRING[66];
  66.   String67  = STRING[67];   String68  = STRING[68];   String69  = STRING[69];
  67.   String70  = STRING[70];   String71  = STRING[71];   String72  = STRING[72];
  68.   String73  = STRING[73];   String74  = STRING[74];   String75  = STRING[75];
  69.   String76  = STRING[76];   String77  = STRING[77];   String78  = STRING[78];
  70.   String79  = STRING[79];   String80  = STRING[80];   String81  = STRING[81];
  71.   String82  = STRING[82];   String83  = STRING[83];   String84  = STRING[84];
  72.   String85  = STRING[85];   String86  = STRING[86];   String87  = STRING[87];
  73.   String88  = STRING[88];   String89  = STRING[89];   String90  = STRING[90];
  74.   String91  = STRING[91];   String92  = STRING[92];   String93  = STRING[93];
  75.   String94  = STRING[94];   String95  = STRING[95];   String96  = STRING[96];
  76.   String97  = STRING[97];   String98  = STRING[98];   String99  = STRING[99];
  77.   String100 = STRING[100];  String101 = STRING[101];  String102 = STRING[102];
  78.   String103 = STRING[103];  String104 = STRING[104];  String105 = STRING[105];
  79.   String106 = STRING[106];  String107 = STRING[107];  String108 = STRING[108];
  80.   String109 = STRING[109];  String110 = STRING[110];  String111 = STRING[111];
  81.   String112 = STRING[112];  String113 = STRING[113];  String114 = STRING[114];
  82.   String115 = STRING[115];  String116 = STRING[116];  String117 = STRING[117];
  83.   String118 = STRING[118];  String119 = STRING[119];  String120 = STRING[120];
  84.   String121 = STRING[121];  String122 = STRING[122];  String123 = STRING[123];
  85.   String124 = STRING[124];  String125 = STRING[125];  String126 = STRING[126];
  86.   String127 = STRING[127];  String128 = STRING[128];  String129 = STRING[129];
  87.   String130 = STRING[130];  String131 = STRING[131];  String132 = STRING[132];
  88.   String133 = STRING[133];  String134 = STRING[134];  String135 = STRING[135];
  89.   String136 = STRING[136];  String137 = STRING[137];  String138 = STRING[138];
  90.   String139 = STRING[139];  String140 = STRING[140];  String141 = STRING[141];
  91.   String142 = STRING[142];  String143 = STRING[143];  String144 = STRING[144];
  92.   String145 = STRING[145];  String146 = STRING[146];  String147 = STRING[147];
  93.   String148 = STRING[148];  String149 = STRING[149];  String150 = STRING[150];
  94.   String151 = STRING[151];  String152 = STRING[152];  String153 = STRING[153];
  95.   String154 = STRING[154];  String155 = STRING[155];  String156 = STRING[156];
  96.   String157 = STRING[157];  String158 = STRING[158];  String159 = STRING[159];
  97.   String160 = STRING[160];  String161 = STRING[161];  String162 = STRING[162];
  98.   String163 = STRING[163];  String164 = STRING[164];  String165 = STRING[165];
  99.   String166 = STRING[166];  String167 = STRING[167];  String168 = STRING[168];
  100.   String169 = STRING[169];  String170 = STRING[170];  String171 = STRING[171];
  101.   String172 = STRING[172];  String173 = STRING[173];  String174 = STRING[174];
  102.   String175 = STRING[175];  String176 = STRING[176];  String177 = STRING[177];
  103.   String178 = STRING[178];  String179 = STRING[179];  String180 = STRING[180];
  104.   String181 = STRING[181];  String182 = STRING[182];  String183 = STRING[183];
  105.   String184 = STRING[184];  String185 = STRING[185];  String186 = STRING[186];
  106.   String187 = STRING[187];  String188 = STRING[188];  String189 = STRING[189];
  107.   String190 = STRING[190];  String191 = STRING[191];  String192 = STRING[192];
  108.   String193 = STRING[193];  String194 = STRING[194];  String195 = STRING[195];
  109.   String196 = STRING[196];  String197 = STRING[197];  String198 = STRING[198];
  110.   String199 = STRING[199];  String200 = STRING[200];  String201 = STRING[201];
  111.   String202 = STRING[202];  String203 = STRING[203];  String204 = STRING[204];
  112.   String205 = STRING[205];  String206 = STRING[206];  String207 = STRING[207];
  113.   String208 = STRING[208];  String209 = STRING[209];  String210 = STRING[210];
  114.   String211 = STRING[211];  String212 = STRING[212];  String213 = STRING[213];
  115.   String214 = STRING[214];  String215 = STRING[215];  String216 = STRING[216];
  116.   String217 = STRING[217];  String218 = STRING[218];  String219 = STRING[219];
  117.   String220 = STRING[220];  String221 = STRING[221];  String222 = STRING[222];
  118.   String223 = STRING[223];  String224 = STRING[224];  String225 = STRING[225];
  119.   String226 = STRING[226];  String227 = STRING[227];  String228 = STRING[228];
  120.   String229 = STRING[229];  String230 = STRING[230];  String231 = STRING[231];
  121.   String232 = STRING[232];  String233 = STRING[233];  String234 = STRING[234];
  122.   String235 = STRING[235];  String236 = STRING[236];  String237 = STRING[237];
  123.   String238